home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Ahoy 1986 July
/
Ahoy_Magazine_86-07_1986_Double_L.d64
/
reversed remarks
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
710b
|
14 lines
100 fori=50500to50625:readq:pokei,q:ck=ck+q:next
110 ifck<>17850thenprint"[147]error in data statements":end
115 print"[147]":poke53280,14:poke53281,0:poke646,7
120 print"sys 50500 [146] to print rem lines reversed"
130 print"sys 50505 [146] to print rem lines normally":new
140 data169,18,76,75,197,169,32,133,2,165,43,133,251,165,44,133,252
150 data160,0,177,251,133,253,200,177,251,133,254,160,3,200,177,251,201
160 data0,240,39,201,143,208,245,200,177,251,201,0,240,28,201,32,240
170 data4,201,18,208,20,200,177,251,201,0,240,13,201,32,240,245,201
180 data18,240,241,136,165,2,145,251,165,254,201,0,240,9,133,252,165
190 data253,133,251,76,85,197,162,0,189,188,197,240,7,32,210,255,232
200 data76,161,197,169,19,141,119,2,169,13,141,120,2,169,2,133,198
210 data96,147,76,73,83,84,0